home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 22 / cdrt22.iso / pc / bugbook / wait.dir / 00045_Script_MOVIE SCRIPT PT 1 < prev    next >
Text File  |  1995-06-27  |  19KB  |  429 lines

  1. -- -- /\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
  2. -- -- Title:Bug Book 
  3. -- -- File:MainMenu.dir
  4. -- -- Script by: Scott Wasserman, Katherine Houghton 
  5. -- -- ⌐1994: Swfte International, Ltd. All Rights Reserved
  6. -- -- Created: March 4, 1995
  7. -- -- Modified: May 1, 1995
  8. -- -- /\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
  9.  
  10.  
  11. -- -- *********************************************************
  12. -- -- SYSTEM HANDLERS
  13. -- -- *********************************************************
  14. ------------------------------------------------------------------------ 
  15. -- CODE STARTUP
  16. ------------------------------------------------------------------------ 
  17. on startMovie
  18.   
  19.     -------------------------
  20.   -- GAME GLOBALS
  21.   -------------------------
  22.   global bugTimeOut,userInfo,escapeTime,startEscapeClock, bugEscape,downSprite,demoName,bugSprite,bugsAvailible,bugActive,lastRandom,inProcess,bugAnims,timeOutMessages,timeOutScript,timeOutLength,homeDir,AnnouncerIntro,HabitatHint,BugEscapeIntros,AnsonButtonHelp,AnnouncerTM
  23.  
  24.   -------------------------
  25.   -- TIMEOUT ANNOUNCER LIST --
  26.   -------------------------  
  27.   set TM1MainMenu=["TM_MM1"]
  28.   set TM2BB=["TM_BB1"]
  29.   set TM3MapScreen=["TM_MS1","TM_MS2"]
  30.   set TM4CorrectHabitat=["TM_CH1","TM_CH2"]
  31.   set TM5BugProfile=["TM_BP1"]
  32.   set TM6Sound=["BugS_13","BugS_9","BugS_1","BugS_22","BugS_6","BugS_29"]
  33.   set TM7BugExper=["TM_BGE1","TM_BGE2"]
  34.   set TM8FieldNotes=["TM_FN1"]
  35.   set TM9Magnify=["TM_M1"]
  36.   set TM10BugPuzzle=["TM_PUZ1"]
  37.   set TM11Size=["TM_S1"]
  38.   set TM12Video=["TM_V1","TM_V2"]
  39.   set TM13RTC=["TM_RTC1","TM_RTC2"]
  40.   set TM14WhatIsBug=["TM_WB1","TM_WB2"]
  41.   set TM15BugChart=["TM_BC1"]
  42.   set TM16BugChartMI=["TM_BCM1"]
  43.   set TM17Meta=["TM_MET1","TM_MET2"]
  44.   set TM18BugTerms=["TM_BT1","TM_BT2"]
  45.   set TM19MatchingGame=["TM_MG1"]
  46.   
  47.   set AnnouncerTM=["AnnTM",TM1MainMenu,TM2BB,TM3MapScreen,TM4CorrectHabitat,TM5BugProfile,TM6Sound,TM7BugExper,TM8FieldNotes,TM9Magnify,TM10BugPuzzle,TM11Size,TM12Video,TM13RTC,TM14WhatIsBug,TM15BugChart,TM16BugChartMI,TM17Meta,TM18BugTerms,TM19MatchingGame]
  48.   
  49.   
  50.   
  51.   
  52.   -------------------------
  53.   -- HELP LISTS--Anson Help & Introduction to help
  54.   -------------------------
  55.   set Anson1Intro=["Is_1","Is_2","Is_3","Is_4","Is_5","Is_6","Is_7","Is_8"]
  56.   set Anson2bugBottles=["AH_BB1","AH_BB2","AH_BB3"]
  57.   set Anson3BugHints=["A_BH1","A_BH2","A_BH3","A_BH4"]
  58.   set Anson4MapScreen=["AH_MS1","AH_MS2","AH_MS3"]
  59.   set Anson5CorrectHabitat=["AH_CH1","AH_CH2"]
  60.   set Anson6IncorrectHabitatHum=["AH_IH1","AH_IH2"]
  61.   set Anson7IncorrectHabitatVoice=["AH_IH5","AH_IH6","AH_IH7"]
  62.   set Anson8BugProfile=["AH_BP1","AH_BP2","AH_BP3"]
  63.   set Anson9BugExper=["AH_BE1","AH_BE2"]
  64.   set Anson10FieldNotes=["AH_FN1","AH_FN2","AH_FN3"]
  65.   set Anson11BugPuzzle1=["AH_BP1","AH_BP4","AH_BP5"]
  66.   set Anson12Size=["AH_S1","AH_S2"]
  67.   set Anson13Video=["VS_7","VS_35","VS_44","VS_30"]
  68.   set Anson14RTOC=["AH_RTC1","AH_RTC2","AH_RTC3"]
  69.   set Anson15WhatIsBug=["AH_WB1","AH_WB2","AH_WB3"]
  70.   set Anson16BugChart=["AH_BC1","AH_BC2"]
  71.   set Anson17ChartMoreInfo=["AH_BCM1","AH_BCM2"]
  72.   set Anson18Metamorph=["AH_MET1","AH_MET2"]
  73.   set Anson19BugTerms=["AH_BT1","AH_BT2"]
  74.   set Anson20MatchGame=["AH_MG1","AH_MG2","AH_MG3"]
  75.   set Anson21Finale=["FNL_1","FNL_2","FNL_3","FNL_4","FNL_5","FNL_6","FNL_7","FNL_8","FNL_9"]
  76.   
  77.   set AnsonButtonHelp=["AnsHpSnd",Anson1Intro,Anson2bugBottles,Anson3BugHints,Anson4MapScreen,Anson5CorrectHabitat,Anson6IncorrectHabitatHum,Anson7IncorrectHabitatVoice,Anson8BugProfile,Anson9BugExper,Anson10FieldNotes,Anson11BugPuzzle1,Anson12Size,Anson13Video,Anson14RTOC,Anson15WhatIsBug,Anson16BugChart,Anson17ChartMoreInfo,Anson18Metamorph,Anson19BugTerms,Anson20MatchGame,Anson21Finale]
  78.   
  79.   
  80.   
  81.   
  82.   set Announcer1MainMenuOver=["OA_MM1","OA_MM2","OA_MM3","OA_MM4","OA_MM5","OA_MM6","OA_MM7"]
  83.   set Announcer2EYN=["OA_EYN1"]
  84.   set Announcer3EYNRepeat=["OA_REP1","OA_REP2","OA_REP3"]
  85.   set Announcer4RestoreGame=["OA_RG1","OA_RG2"]
  86.   set Announcer5DeletedGame=["OA_DDAT1"]
  87.   set Announcer6BEO=["OA_BEO1"]
  88.   set Announcer7Quit=["OA_QT1","OA_QT2","OA_QT3"]
  89.   set AnnouncerIntro=["AnnIntro",Announcer1MainMenuOver,Announcer2EYN,Announcer3EYNRepeat,Announcer4RestoreGame,Announcer5DeletedGame,Announcer6BEO,Announcer7Quit]
  90.   
  91.   -------------------------
  92.   -- HABITAT HINT LIST--hints in habitat & map
  93.   -------------------------
  94.   set HabitatHint=["AnsonHH","HH_1", "HH_2", "HH_3", "HH_4", "HH_5", "HH_6", "HH_7", "HH_8", "HH_9", "HH_10", "HH_11", "HH_12", "HH_13", "HH_14", "HH_15", "HH_16", "HH_17", "HH_18", "HH_19", "HH_20", "HH_21", "HH_22", "HH_23", "HH_24", "HH_25", "HH_26", "HH_27", "HH_28", "HH_29", "HH_30", "HH_31", "HH_32", "HH_33", "HH_34", "HH_35", "HH_36", "HH_37", "HH_38", "HH_39", "HH_40", "HH_41", "HH_42", "HH_43", "HH_44", "HH_45", "HH_46", "HH_47", "HH_48", "HH_49", "HH_50"]
  95.   
  96.   -------------------------
  97.   -- BUG ESCAPE INTROS --while go to bugEscape
  98.   -------------------------
  99.   set BugEscapeIntros= ["AnnBugE","BE_1", "BE_2", "BE_3", "BE_4", "BE_5", "BE_6", "BE_7", "BE_8", "BE_9", "BE_10", "BE_11", "BE_12", "BE_13", "BE_14", "BE_15", "BE_16", "BE_17", "BE_18", "BE_19", "BE_20", "BE_21", "BE_22", "BE_23", "BE_24", "BE_25", "BE_26", "BE_27", "BE_28", "BE_29", "BE_30", "BE_31", "BE_32", "BE_33", "BE_34", "BE_35", "BE_36", "BE_37", "BE_38", "BE_39", "BE_40", "BE_41", "BE_42", "BE_43", "BE_44", "BE_45", "BE_46", "BE_47", "BE_48", "BE_49", "BE_50"]
  100.   
  101.   
  102.   set escapeTime = 5
  103.   set startEscapeClock=""
  104.   
  105.   
  106.  
  107.   
  108.   -------------------------
  109.   --bug Aniamations
  110.   -------------------------
  111.   set bugAnims = [["",-34, 422, "1-1", -9, 422, "1-1", 2, 422, "1-2", 12, 422, "1-1", 23, 422, "1-2", 33, 422, "1-1", 44, 422, "1-2", 54, 422, "1-1", 65, 423, "1-2", 76, 423, "1-1", 86, 423, "1-2", 97, 423, "1-1", 107, 423, "1-2", 118, 423, "1-1", 128, 423, "1-2", 139, 423, "1-1", 149, 423, "1-2", 160, 423, "1-1", 171, 423, "1-2", 181, 423, "1-1", 192, 424, "1-2", 202, 424, "1-1", 213, 424, "1-2", 223, 424, "1-1", 234, 424, "1-2", 245, 424, "1-1", 255, 424, "1-2", 266, 424, "1-1", 276, 424, "1-2", 287, 424, "1-1", 297, 424, "1-2", 308, 424, "1-1", 319, 425, "1-2", 329, 425, "1-1", 340, 425, "1-2", 350, 425, "1-1", 361, 425, "1-2", 371, 425, "1-1", 382, 425, "1-2", 392, 425, "1-1", 403, 425, "1-2", 414, 425, "1-1", 424, 425, "1-2", 435, 425, "1-1", 445, 425, "1-2", 456, 426, "1-1", 466, 426, "1-2", 477, 426, "1-1", 488, 426, "1-2", 498, 426, "1-1", 509, 426, "1-2", 519, 426, "1-1", 530, 426, "1-2", 540, 426, "1-1", 551, 426, "1-2", 561, 426, "1-1", 572, 426, "1-2", 583, 427, "1-1", 593, 427, "1-2", 604, 427, "1-1", 614, 427, "1-2", 625, 427, "1-1", 635, 427, "1-2", 646, 427, "1-1", 666, 427, "1-1"],¼
  112. ¼
  113.   ["",641, -16, "28-1", 641, 2, "28-1", 579, 11, "28-1", 516, 20, "28-1", 516, 20, "28-1", 516, 20, "28-1", 516, 20, "28-1", 516, 20, "28-1", 516, 20, "28-1", 516, 20, "28-1", 512, 11, "28-2", 503, 20, "28-3", 503, 20, "28-3", 503, 20, "28-3", 503, 20, "28-3", 512, 14, "28-3", 579, 53, "28-3", 645, 92, "28-3", 665, 92, "28-3"],¼
  114. ¼
  115.   ["",-98, -97, "30-1", 582, 107, "30-1", 577, 107, "30-2", 574, 107, "30-3", 571, 107, "30-4", 566, 107, "30-5", 540, 113, "30-6", 533, 113, "30-7", 527, 113, "30-6", 520, 113, "30-7", 514, 113, "30-6", 507, 113, "30-7", 501, 113, "30-6", 494, 113, "30-7", 488, 113, "30-6", 481, 113, "30-7", 475, 113, "30-6", 468, 113, "30-7", 462, 113, "30-6", 455, 113, "30-7", 449, 113, "30-6", 442, 113, "30-7", 435, 113, "30-6", 429, 113, "30-7", 422, 113, "30-6", 416, 113, "30-7", 409, 113, "30-6", 403, 113, "30-7", 396, 113, "30-6", 390, 113, "30-7", 383, 113, "30-6", 377, 113, "30-7", 370, 113, "30-6", 364, 113, "30-7", 357, 113, "30-6", 380, 107, "30-8", 376, 108, "30-9", 372, 108, "30-10", 369, 109, "30-11", -96, -96, "30-11"],¼
  116. ¼
  117.   ["",-98, -97, "30-1", 582, 107, "30-1", 577, 107, "30-2", 574, 107, "30-3", 571, 107, "30-4", 566, 107, "30-5", 540, 113, "30-6", 533, 113, "30-7", 527, 113, "30-6", 520, 113, "30-7", 514, 113, "30-6", 507, 113, "30-7", 501, 113, "30-6", 494, 113, "30-7", 488, 113, "30-6", 481, 113, "30-7", 475, 113, "30-6", 468, 113, "30-7", 462, 113, "30-6", 455, 113, "30-7", 449, 113, "30-6", 442, 113, "30-7", 435, 113, "30-6", 429, 113, "30-7", 422, 113, "30-6", 416, 113, "30-7", 409, 113, "30-6", 403, 113, "30-7", 396, 113, "30-6", 390, 113, "30-7", 383, 113, "30-6", 377, 113, "30-7", 370, 113, "30-6", 364, 113, "30-7", 357, 113, "30-6", 380, 107, "30-8", 376, 108, "30-9", 372, 108, "30-10", 369, 109, "30-11", -96, -96, "30-11"],¼
  118. ¼
  119.   ["",-15, 28, "20-1", 3, 28, "20-1", 44, 32, "20-2", 85, 36, "20-1", 127, 41, "20-2", 168, 45, "20-1", 209, 49, "20-2", 162, 59, "20-3", -95, -98, "20-3", -95, -98, "20-3", 19, 90, "20-4", 55, 77, "20-2", 91, 63, "20-1", 128, 50, "20-2", 164, 36, "20-1", 200, 23, "20-2", 167, 24, "20-3", 134, 25, "20-4", 102, 26, "20-3", 69, 26, "20-4", 36, 27, "20-3", 44, 32, "20-2", 85, 36, "20-1", 127, 41, "20-2", 168, 45, "20-1", 209, 49, "20-4", 162, 59, "20-3", 114, 70, "20-4", 67, 80, "20-3", 19, 90, "20-1", 51, 79, "20-2", -95, -98, "20-3", 130, 48, "20-2", 164, 36, "20-1", 200, 23, "20-4", 167, 24, "20-3", 134, 25, "20-4", 102, 26, "20-3", 69, 26, "20-4", 36, 27, "20-3", -95, -98, "20-3"] ]
  120.   
  121.   -------------------------
  122.   -- PROGRAM INITIALIZATION
  123.   -------------------------
  124.   -- CHANGE THIS TO CHANGE THE SPECIAL DEMO USER NAME
  125.   
  126.   
  127.   
  128.   set bugSprite = 47
  129.   puppetSprite bugSprite,TRUE
  130.   set bugsAvailible = ["bug1","bug2","bug3","bug4","bug5"]
  131.   set bugTimeout = 200
  132.   set bugActive=FALSE
  133.   set lastRandom=0
  134.   set downSprite=48
  135.   puppetSprite downSprite,TRUE
  136.   
  137.   
  138.   
  139.   -------------------------
  140.   --INIT USER INFO & BUGESCAPE
  141.   -------------------------
  142.   set userInfo=initUserInfo()
  143.   set bugEscape=0
  144.   
  145.   -------------------------
  146.   --EMPTY THE FIELD FOR RESTORE GAME
  147.   -------------------------
  148.   
  149.   
  150.   -------------------------
  151.   --LETTER BLANK IN NEW GAME
  152.   -------------------------
  153.   set inProcess=FALSE
  154.   
  155.   -------------------------- 
  156.   -- CODE TIMEOUT SET-UP
  157.   -------------------------- 
  158. --  set timeOutMessages = ["TM_MM1"]
  159.   
  160.   set the timeoutScript to "doTimeOut"
  161.   set the timeoutLength to 60 * 60
  162.   
  163.   -------------------------
  164.   --PRELOADS
  165.   -------------------------
  166.   
  167. end startMovie
  168. ------------------------------------------------------------------------
  169.  
  170.  
  171. ------------------------------------------------------------------------
  172. -- CODE UNLOAD
  173. ------------------------------------------------------------------------
  174. on stopMovie
  175.   
  176. end stopMovie
  177. ------------------------------------------------------------------------
  178.  
  179.  
  180.  
  181.  
  182. on PuppetSoundStop
  183.   updateStage
  184.   repeat while SoundBusy(1)
  185.     --
  186.   end repeat
  187.   puppetSound 0
  188. end  puppetSoundStop
  189.  
  190.  
  191. -- -- *********************************************************
  192. -- -- LINGO USED AGAIN & AGAIN
  193. -- -- *********************************************************
  194.  
  195. ------------------------------------------------------------------------
  196. -- CODE FOR TIMEOUT SCRIPT
  197. ------------------------------------------------------------------------
  198. on doTimeOut
  199.   global timeOutMessages,localDir
  200.   go "start" of movie localDir & "bugDemo.dir"
  201. end doTimeOut
  202. ------------------------------------------------------------------------
  203.  
  204.  
  205. on backDown
  206.   global downSprite
  207.   sound stop 1
  208.   puppetSound "back"  
  209.   
  210.   set the castNum of sprite downSprite = the number of cast "returnDown"
  211.   set the loch of sprite downSprite = 619
  212.   set the locv of sprite downSprite = 459
  213.   PuppetSoundStop()
  214.   set the loch of sprite downSprite = -100
  215.   set the locv of sprite downSprite = -100
  216.   updateStage
  217. end  backDown
  218. ------------------------------------------------------------------------
  219.  
  220.  
  221. ------------------------------------------------------------------------ 
  222. -- CODE FOR DEPRESSED ANY BUTTON
  223. ------------------------------------------------------------------------ 
  224. on ButtonDown needCast,NeedSound,NeedSprite
  225.   sound stop 1
  226.   puppetSound NeedSound  
  227.   puppetSprite needSprite,TRUE
  228.   set the castNum of sprite needSprite = the number of cast (needCast&".Dwn")
  229.   updateStage
  230.   PuppetSoundStop()
  231.   puppetSprite needSprite,FALSE
  232. end  ButtonDown
  233. ------------------------------------------------------------------------
  234.  
  235.  
  236. -- -- *********************************************************
  237. -- -- SOUNDS
  238. -- -- *********************************************************
  239. ------------------------------------------------------------------------
  240. -- PLAYS ANY FILE IN CHANNEL 2
  241. ------------------------------------------------------------------------
  242. on playAif fileName
  243.   sound playFile 2,fileName&".aif"
  244. end playAif
  245. ------------------------------------------------------------------------
  246.  
  247.  
  248. ------------------------------------------------------------------------
  249. -- PLAYS PUPPETSOUND
  250. ------------------------------------------------------------------------
  251. on playPuppet soundName
  252.   puppetSound soundName
  253.   updateStage
  254.   repeat while soundBusy(1)
  255.     --
  256.   end repeat
  257.   puppetSound 0
  258. end playPuppet
  259. ------------------------------------------------------------------------
  260.  
  261. ------------------------------------------------------------------------
  262. -- PLAYS AIF FILE IN CHANNEL 1
  263. ------------------------------------------------------------------------
  264. on playAnsonSound FileNme,FolderNme
  265.   global localDir
  266.   set the timeOutLapsed to 0
  267.   if the machineType=256 then
  268.     sound playFile 1,localDir& FolderNme&"\" &FileNme&".aif"
  269.   else
  270.     sound playFile 1,localDir& FolderNme& ":" &FileNme&".aif"
  271.   end if
  272.   
  273. end  playAnsonSound
  274. ------------------------------------------------------------------------
  275. -- PLAYS SOUND RANDOMLY
  276. ------------------------------------------------------------------------
  277. on playFunSound
  278.   if random(2)=1 then
  279.     playPuppet("fun")
  280.   else
  281.     playPuppet("zip")
  282.   end if
  283.   repeat while soundBusy(1)
  284.     
  285.   end repeat
  286. end playFunSound
  287. ------------------------------------------------------------------------
  288.  
  289.  
  290. -- -- *********************************************************
  291. -- -- BUG ANIMATION BY LINGO
  292. -- -- *********************************************************
  293. ------------------------------------------------------------------------
  294. -- CREATES LIST FOR ONE BUG FROM BUGANIM LIST (list different for each movie)
  295. ------------------------------------------------------------------------
  296. on loadBug bugNum
  297.   global bugAnims
  298.   set bugList=getAt(bugAnims,bugNum)
  299.   return bugList
  300. end loadBug
  301. ------------------------------------------------------------------------
  302.  
  303.  
  304. ------------------------------------------------------------------------
  305. -- MOVES BUGS AS LINGO
  306. ------------------------------------------------------------------------
  307. on bugAction
  308.   global currBugList,bugState,bugSprite,currBug,bugsAvailible,bugCount,lastRandom,bugActive
  309.   
  310.   if bugState=1 then 
  311.     set currRandom=random( count( bugsAvailible ) )
  312.     repeat while (currRandom = lastRandom)
  313.       set currRandom=random( count( bugsAvailible ) )
  314.     end repeat
  315.     set lastRandom=currRandom
  316.     
  317.     set currBug=( getAt( bugsAvailible,( currRandom ) ) )
  318.     
  319.     set currBugList=loadBug(currRandom)
  320.     
  321.     --playAif(getAt(currBugList,bugState))
  322.     set bugState=bugState+1
  323.     set the loch of sprite bugSprite = (getAt(currBugList,bugState))
  324.     set the locv of sprite bugSprite = (getAt(currBugList,bugState+1))
  325.     set the castNum of sprite bugSprite = the number of cast (getAt(currBugList,bugState+2))
  326.     set the stretch of sprite bugSprite = FALSE
  327.     set bugState=bugState+3
  328.   else
  329.     if (bugState < (count(currBugList))) then
  330.       
  331.       set the loch of sprite bugSprite = (getAt(currBugList,bugState))
  332.       set the locv of sprite bugSprite = (getAt(currBugList,bugState+1))
  333.       set the castNum of sprite bugSprite = the number of cast (getAt(currBugList,bugState+2))
  334.       set the stretch of sprite bugSprite = FALSE
  335.       set bugState=bugState+3
  336.     else
  337.       set the loch of sprite bugSprite = -100
  338.       set the locv of sprite bugSprite = -100
  339.       set bugActive=FALSE
  340.       startTimer
  341.     end if
  342.   end if
  343.   
  344. end bugAction
  345. ------------------------------------------------------------------------
  346.  
  347.  
  348. ------------------------------------------------------------------------
  349. -- CREATES BUGLIST FROM ANIMATED BUG IN SCORE--not used for anything here
  350. ------------------------------------------------------------------------
  351. on makeList
  352.   global bugsAvailible
  353.   set bigBugList=[]
  354.   repeat with bugNum=1 to (count(bugsAvailible))
  355.     set currBug=(getAt(bugsAvailible,bugNum))
  356.     set tmpList=[line 1 of field currBug]
  357.     repeat with bugIndex=2 to (the number of lines in field currBug)
  358.       if not(line bugIndex of field currBug="") then
  359.         append(tmpList,value(word 1 of line bugIndex of field currBug))
  360.         append(tmpList,value(word 2 of line bugIndex of field currBug))
  361.         append(tmpList,word 3 of line bugIndex of field currBug)
  362.       end if 
  363.     end repeat
  364.     
  365.     append(bigBugList,tmpList)
  366.   end repeat
  367.   
  368.   set the text of cast "bigBugList" = ""
  369.   set the text of cast "bigBugList" = string(bigBugList)
  370. end makeList
  371. ------------------------------------------------------------------------ 
  372. -- CODE FOR DEPRESSED BUTTON & SOUND
  373. ------------------------------------------------------------------------ 
  374. on DepressedButton NeedbuttonName,NeedSpriteNum,NeedSound
  375.   sound stop 1
  376.   puppetSound NeedSound  
  377.   puppetSprite NeedSpriteNum,TRUE
  378.   set the castNum of sprite NeedSpriteNum = the number of cast NeedbuttonName
  379.   PuppetSoundStop()
  380.   puppetSprite NeedSpriteNum,FALSE
  381.   updateStage
  382. end  backDown
  383.  
  384.  
  385.  
  386. ------------------------------------------------------------------------
  387. -- CREATES A STARTFILE FOR USERINFO -used in startUp
  388. ------------------------------------------------------------------------
  389. --------------------
  390. -- UserInfo=1.BugList(notFound=0),2.BugEscape(not used=0),3.UserName,4.UserNumber,5.UserIntro(Will play aiff file=1),6.catchList
  391. --------------------
  392. on initUserInfo
  393.   return [[0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1],0,"",0,[1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1],[]]
  394. end initUserInfo
  395. ------------------------------------------------------------------------
  396.  
  397.  
  398. --------------------------------------------------------------------------------
  399. --               THIS CODE IS FOR THE REAR WINDOW XOBJECT
  400. --                           DO NOT TOUCH
  401. --------------------------------------------------------------------------------
  402.  
  403. -- RearWindow XObject
  404. -- by David Jackson-Shields
  405. -- vers. 1.0.2 (10/11/93)
  406. --
  407. -- ⌐ 1992-94 by Macromedia, Inc. and David Jackson-Shields
  408. -- All Rights Reserved
  409.  
  410. on releaseRearWindow
  411.   if not(the machineType=256) then
  412.     
  413.     global rwObj
  414.     if objectP( rwObj ) then
  415.       rwObj( mDispose )
  416.     end if
  417.     
  418.     -- You must Close the Xlib if you do not have
  419.     -- the XCOD resource installed in the movie with ResEdit:
  420.     CloseXLib
  421.   end if
  422. end releaseRearWindow
  423.  
  424. --------------------------------------------------------------------------------
  425.  
  426.  
  427.  
  428.  
  429.